perm filename SIZE.PAS[EAL,HE] blob sn#674819 filedate 1982-09-27 generic text, type T, neo UTF8
%include sizhdr.pas;

begin
writeln('Vector size is    ',size(vector):2,' bytes.');
writeln('Trans size is     ',size(trans):2,' bytes.');
writeln('String size is    ',size(strng):2,' bytes.');
writeln('Event size is     ',size(event):2,' bytes.');
writeln('Frame size is     ',size(frame):2,' bytes.');
writeln('Stmnt size is     ',size(statement):2,' bytes.');
writeln('Varidef size is   ',size(varidef):2,' bytes.');
writeln('Node size is      ',size(node):2,' bytes.');
writeln('Ident size is     ',size(ident):2, ' bytes.');
writeln('Token  size is    ',size(Token ):2,' bytes.');
writeln('Resword  size is  ',size(Resword ):2,' bytes.');
writeln('Pdb  size is      ',size(Pdb ):2,' bytes.');
writeln('Envheader size is ',size(Envheader ):2,' bytes.');
writeln('Enventry size is  ',size(Enventry ):2,' bytes.');
writeln('Environment size: ',size(Environment ):2,' bytes.');
writeln('Cmoncb size is    ',size(Cmoncb ):2,' bytes.');
end.